home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / os2 / mtic132o.zip / INFOS.RAR / INFOS / MTS_RA.200 < prev    next >
Text File  |  1996-06-20  |  11KB  |  357 lines
  1. (*
  2.    This document is (C) Copyright Andrew Milner & Wantree Development, 1993.
  3.    All rights reserved.
  4.  
  5.    Modified for 
  6.  
  7.              ▓███▀█▀█ ▓███▀█ ▓███▀▀  ▓███▀█ ▀▀████▀▀  ▀▀▀ ▓███▀█
  8.              ▒███   █ ▒███▄  ▒███ ▀█ ▒███▄█   ███░   ███░ ▒███
  9.              ████   █ ████▄▄ ████▄▄█ ████ █   ███▒   ███▒ ████▄█
  10.                     ▀
  11.    and RemtoteAccess 2.50 by DiMeS 1996.
  12. *)
  13.  
  14. TYPE
  15.  
  16.   AskType        = (Yes, No, Ask, Only);
  17.   VideoType      = (Auto, Short, Long);
  18.   MsgType        = (LocalMail, NetMail, EchoMail);
  19.   MsgKindsType   = (Both, Private, Public, ROnly, NoReply);
  20.   OrphanType     = (Ignore, Create, Kill);
  21.   FlagType       = array[1..4] of Byte;
  22.   Time           = String[5];
  23.   Date           = String[8];
  24.   LongDate       = String[9];
  25.   ByteArray32    = Array[1..32] of Byte;
  26.   COMBINEDrecord = array[1..200] of Word;
  27.   NetAddress     = Record
  28.                      Zone,
  29.                      Net,
  30.                      Node,
  31.                      Point          : Word;
  32.                    End;
  33.  
  34.   ARCrecord = record
  35.                 Extension : String[3];
  36.                 UnpackCmd,
  37.                 PackCmd   : String[60];
  38.               end;
  39.  
  40.   FILESHDRrecord = record
  41.                      Name           : String[12];
  42.                      Size,
  43.                      CRC32          : LongInt;
  44.                      Uploader       : String[35];
  45.                      UploadDate,
  46.                      FileDate,
  47.                      LastDL         : LongInt;
  48.                      TimesDL        : Word;
  49.                      Attrib         : Byte;
  50.                      Password       : String[15];
  51.                      KeyWord        : Array[1..5] of String[15];
  52.                      Cost           : Word;
  53.                      LongDescPtr    : LongInt;
  54.                      FreeSpace      : Array[1..20] of Byte;
  55.                    end;
  56.  
  57.           {Attrib - Bit 0 : Deleted
  58.                         1 : Unlisted
  59.                         2 : Free (don't adjust ratio) - Does NOT affect "Cost"
  60.                         3 : Not available (don't allow downloads)
  61.                         4 : Locked (no kill)
  62.                         5 : Missing/offline
  63.                         6 : No time restrictions - always allow DL
  64.           }
  65.  
  66.   FILESIDXrecord = record
  67.                      Name           : String[12];
  68.                      UploadDate     : LongInt;
  69.                      KeyWordCRC     : Array[1..5] of LongInt;
  70.                      LongDescPtr    : LongInt;
  71.                    end;
  72.  
  73.   FILESRDXrecord = record
  74.                      FILESidx : Word;
  75.                    end;
  76.  
  77.   FILESrecord    = record
  78.                      AreaNum,
  79.                      Unused         : Word;
  80.                      Name           : String[40];
  81.                      Attrib         : Byte;
  82.  
  83.                       { Bit 0 : Include in new files scan
  84.                             1 : Include in upload dupe scan
  85.                     2 : Permit long descriptions
  86.                             3 : Area is on CD-ROM
  87.                             4 : All files are FREE
  88.                             5 : Allow DLs not in FDB
  89.                             6 : Allow users to password uploads
  90.                             7 : Scan uploads }
  91.  
  92.                      FilePath       : String[40];
  93.                      KillDaysDL,
  94.                      KillDaysFD     : Word;
  95.                      Password       : String[15];
  96.                      MoveArea       : Word;
  97.                      Age,
  98.                      ConvertExt     : Byte;
  99.                      Group          : Word;
  100.                      Attrib2        : Byte;
  101.  
  102.                       { Bit 0 : Include in all groups }
  103.  
  104.                      DefCost,
  105.                      UploadArea,
  106.                      UploadSecurity : Word;
  107.                      UploadFlags,
  108.                      UploadNotFlags : FlagType;
  109.                      Security       : Word;
  110.                      Flags,
  111.                      NotFlags       : FlagType;
  112.                      ListSecurity   : Word;
  113.                      ListFlags,
  114.                      ListNotFlags   : FlagType;
  115.                      AltGroup       : Array[1..3] of Word;
  116.                      Device         : Byte;
  117.                      FreeSpace      : Array[1..13] of Byte;
  118.                    end;
  119.  
  120.   FFILESrecord = File of FILESrecord;
  121.  
  122.   CONFIGrecord = record
  123.     VersionID           : Word;
  124.     xCommPort           : Byte;
  125.     xBaud               : LongInt;
  126.     xInitTries          : Byte;
  127.     xInitStr,
  128.     xBusyStr            : String[70];
  129.     xInitResp,
  130.     xBusyResp,
  131.     xConnect300,
  132.     xConnect1200,
  133.     xConnect2400,
  134.     xConnect4800,
  135.     xConnect9600,
  136.     xConnect19k,
  137.     xConnect38k         : String[40];
  138.     xAnswerPhone        : Boolean;
  139.     xRing,
  140.     xAnswerStr          : String[20];
  141.     xFlushBuffer        : Boolean;
  142.     xModemDelay         : Integer;
  143.  
  144.     MinimumBaud,
  145.     GraphicsBaud,
  146.     TransferBaud        : word;
  147.     SlowBaudTimeStart,
  148.     SlowBaudTimeEnd,
  149.     DownloadTimeStart,
  150.     DownloadTimeEnd     : Time;
  151.  
  152.     PageStart           : Array[0..6] of Time;
  153.     PageEnd             : Array[0..6] of Time;
  154.  
  155.     SeriNum,
  156.     CustNum             : String[22];
  157. {}  FreeSpace1          : Array[1..24] of Byte;
  158.     PwdExpiry           : Word;
  159.  
  160.     MenuPath,
  161.     TextPath,
  162.     AttachPath,
  163.     NodelistPath,
  164.     MsgBasePath,
  165.     SysPath,
  166.     ExternalEdCmd       : String[60];
  167.  
  168.     Address             : Array[0..9] of NetAddress;
  169.     SystemName          : String[30];
  170.  
  171.     NewSecurity         : Word;
  172.     NewCredit           : Word;
  173.     NewFlags            : FlagType;
  174.  
  175.     OriginLine          : String[60];
  176.     QuoteString         : String[15];
  177.     Sysop               : String[35];
  178.     LogFileName         : String[60];
  179.     FastLogon,
  180.     AllowSysRem,
  181.     MonoMode,
  182.     StrictPwdChecking,
  183.     DirectWrite,
  184.     SnowCheck           : Boolean;
  185.     CreditFactor        : Integer;
  186.  
  187.     UserTimeOut,
  188.     LogonTime,
  189.     PasswordTries,
  190.     MaxPage,
  191.     PageLength          : Word;
  192.     CheckForMultiLogon,
  193.     ExcludeSysopFromList,
  194.     OneWordNames        : Boolean;
  195.     CheckMail           : AskType;
  196.     AskVoicePhone,
  197.     AskDataPhone,
  198.     DoFullMailCheck,
  199.     AllowFileShells,
  200.     FixUploadDates,
  201.     FreezeChat          : Boolean;
  202.     ANSI,                       { ANSI: Yes, no, or ask new users     }
  203.     ClearScreen,                { Clear:        "                     }
  204.     MorePrompt          : AskType;    { More:         "                     }
  205.     UploadMsgs          : Boolean;
  206.     KillSent            : AskType;    { Kill/Sent     "                     }
  207.  
  208.     CrashAskSec         : Word;       { Min sec# to ask 'Crash Mail ?'      }
  209.     CrashAskFlags       : FlagType;
  210.     CrashSec            : Word;       { Min sec# to always send crash mail. }
  211.     CrashFlags          : FlagType;
  212.     FAttachSec          : Word;       {        "    ask 'File Attach ?'     }
  213.     FAttachFlags        : FlagType;
  214.  
  215.     NormFore,
  216.     NormBack,
  217.     StatFore,
  218.     StatBack,
  219.     HiBack,
  220.     HiFore,
  221.     WindFore,
  222.     WindBack,
  223.     ExitLocal,
  224.     Exit300,
  225.     Exit1200,
  226.     Exit2400,
  227.     Exit4800,
  228.     Exit9600,
  229.     Exit19k,
  230.     Exit38k             : Byte;
  231.  
  232.     MultiLine           : Boolean;
  233.     MinPwdLen           : Byte;
  234.     MinUpSpace          : Word;
  235.     HotKeys             : AskType;
  236.     BorderFore,
  237.     BorderBack,
  238.     BarFore,
  239.     BarBack,
  240.     LogStyle,
  241.     MultiTasker,
  242.     PwdBoard            : Byte;
  243.     xBufferSize         : Word;
  244.     FKeys               : Array[1..10] of String[60];
  245.  
  246.     WhyPage             : Boolean;
  247.     LeaveMsg            : Byte;
  248.     ShowMissingFiles,
  249.     xLockModem          : Boolean;
  250. {}  FreeSpace2          : Array[1..10] of Byte;
  251.     AllowNetmailReplies : Boolean;
  252.     LogonPrompt         : String[40];
  253.     CheckNewFiles       : AskType;
  254.     ReplyHeader         : String[60];
  255.     BlankSecs           : byte;
  256.     ProtocolAttrib      : Array[1..6] of Byte;
  257.     xErrorFreeString    : String[15];
  258.     xDefaultCombined    : array[1..25] of Byte;
  259.     RenumThreshold      : Word;
  260.     LeftBracket,
  261.     RightBracket        : Char;
  262.     AskForHandle        : Boolean;
  263.     AskForBirthDate     : Boolean;
  264.  
  265.     GroupMailSec        : Word;
  266.  
  267.     ConfirmMsgDeletes   : Boolean;
  268.  
  269.     FreeSpace4          : Array[1..30] of byte;
  270.  
  271.     TempScanDir         : String[60];
  272.     ScanNow             : AskType;
  273.     xUnknownArcAction,
  274.     xFailedUnpackAction,
  275.     FailedScanAction    : Byte; {Bit 0:Mark deleted, 1:Mark unlisted, 2:Mark notavail}
  276.     xUnknownArcArea,
  277.     xFailedUnpackArea,
  278.     FailedScanArea      : Word;
  279.     ScanCmd             : String[60];
  280.     xDeductIfUnknown    : Boolean;
  281.  
  282.     NewUserGroup        : Byte;
  283.     AVATAR              : AskType;
  284.     BadPwdArea          : Byte;
  285.     Location            : String[40];
  286.     DoAfterAction       : Byte; {0 = wait for CR, > 0 = wait for x seconds}
  287. {}  OldFileLine         : String[40];
  288.     CRfore,
  289.     CRback              : Byte;
  290.     LangHdr             : String[40];
  291.     xSendBreak          : Boolean;
  292. {}  ListPath            : String[60];
  293.     FullMsgView         : AskType;
  294.     EMSI_Enable         : AskType;
  295.     EMSI_NewUser        : Boolean;
  296.  
  297.     EchoChar            : String[1];
  298.     xConnect7200,
  299.     xConnect12000,
  300.     xConnect14400       : String[40];
  301.     Exit7200,
  302.     Exit12000,
  303.     Exit14400           : Byte;
  304.     ChatCommand         : String[60];
  305.     ExtEd               : AskType;
  306.     NewuserLanguage     : Byte;
  307.     LanguagePrompt      : String[40];
  308.     VideoMode           : VideoType;
  309.     AutoDetectANSI      : Boolean;
  310.     xOffHook            : Boolean;
  311.     NewUserDateFormat   : Byte;
  312.     KeyboardPwd         : String[15];
  313.     CapLocation         : Boolean;
  314.     NewuserSub          : Byte;
  315.     PrinterName         : String[4];
  316.     HilitePromptFore,
  317.     HiLitePromptBack    : Byte;
  318.     xInitStr2           : String[70];
  319.     AltJSwap            : Boolean;
  320.     SemPath             : String[60];
  321.     AutoChatCapture     : Boolean;
  322.  
  323.     FileBasePath        : String[60];
  324.     NewFileTag          : Boolean;
  325.     IgnoreDupeExt       : Boolean;
  326.     TempCDFilePath      : String[60];
  327.     TagFore,
  328.     TagBack             : Byte;
  329.     xConnect16k         : String[40];
  330.     Exit16k,
  331.     FilePayback         : Byte;
  332.     FileLine,
  333.     FileMissingLine     : String[200];
  334.     NewUserULCredit     : Byte;
  335.     NewUserULCreditK    : Word;
  336.     ArcInfo             : Array[1..10] of ARCrecord;
  337.     RAMGRAltFKeys       : Array[1..5] of String[60];
  338.     ArcViewCmd          : String[60];
  339.     xConnectFax         : String[40];
  340.     ExitFax             : Byte;
  341.     UseXMS,
  342.     UseEMS              : Boolean;
  343.     CheckDOB            : Byte;
  344.     EchoCheck           : AskType;
  345.     ccSec,
  346.     ReturnRecSec        : Word;
  347.     HonourNetReq        : Boolean;
  348.     DefaultCombined     : COMBINEDrecord;
  349.     AskForSex,
  350.     AskForAddress       : Boolean;
  351.     DLdesc              : AskType;
  352.     NewPhoneScan        : Boolean;
  353.     FutureExpansion : Array[1..587] of Byte;
  354.   end;
  355.  
  356. (* End of "STRUCT.200" *)
  357.